home *** CD-ROM | disk | FTP | other *** search
/ Software Vault: The Gold Collection / Software Vault - The Gold Collection (American Databankers) (1993).ISO / cdr49 / 116_01.zip / EADVENT.C < prev    next >
Text File  |  1993-06-19  |  512b  |  31 lines
  1.  
  2. /*  EADVENT.C   no modifications for V 1.43 */
  3. #include "advent.h"
  4.  
  5. main()
  6. {
  7.     init();
  8.     if (yes(65,1,0))
  9.         limit = 1000;
  10.     else
  11.         limit = 330;
  12.     while(!saveflg)
  13.         turn();
  14.     if (saveflg)
  15.         exec("saveadv");
  16. }
  17.  
  18. /*
  19.     Initialization
  20. */
  21. init()
  22. {
  23.     fd[1]=fopen("advent1.dat",dbuff);
  24.     fd[2]=fopen("advent2.dat",dbuff);
  25.     fd[3]=fopen("advent3.dat",dbuff);
  26.     fd[4]=fopen("advent4.dat",dbuff);
  27.     fd[5]=fopen("advent5.dat",dbuff);
  28.     fd[6]=fopen("advent6.dat",dbuff);
  29.     srand(511);
  30. }
  31.